EditGet(oGet,[lCanEdit]) --> true:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Functions:
~~~~~~~~~~
Get object value can be edited or viewed. This function replaces the original
Clipper system GETSYS.prg .

Parameter description:
~~~~~~~~~~~~~~~~~~~~~~
oGet:     clipper object to view / edit.
lCanEdit: true if the edit of GET object is enabled.

Return value:
~~~~~~~~~~~~~
true

Remarks:
~~~~~~~~
This functiion was written because the original GETSYS.prg was too slowly.

Source code is in file  Object3.prg